export const HTMLFormat = (function() {
  function style_html(html_source, indent_size, indent_character, max_char) {
    var Parser, multi_parser;

    function Parser() {
      this.pos = 0;
      this.token = "";
      this.current_mode = "CONTENT";
      this.tags = {
        parent: "parent1",
        parentcount: 1,
        parent1: "",
      };
      this.tag_type = "";
      this.token_text = this.last_token = this.last_text = this.token_type = "";

      this.Utils = {
        whitespace: "\n\r\t ".split(""),
        single_token: "br,input,link,meta,!doctype,basefont,base,area,hr,wbr,param,img,isindex,?xml,embed".split(
          ","
        ),
        extra_liners: "head,body,/html".split(","),
        in_array: function(what, arr) {
          for (var i = 0; i < arr.length; i++) {
            if (what === arr[i]) {
              return true;
            }
          }
          return false;
        },
      };

      this.get_content = function() {
        var char = "";
        var content = [];
        var space = false;
        while (this.input.charAt(this.pos) !== "<") {
          if (this.pos >= this.input.length) {
            return content.length ? content.join("") : ["", "TK_EOF"];
          }

          char = this.input.charAt(this.pos);
          this.pos++;
          this.line_char_count++;

          if (this.Utils.in_array(char, this.Utils.whitespace)) {
            if (content.length) {
              space = true;
            }
            this.line_char_count--;
            continue;
          } else if (space) {
            if (this.line_char_count >= this.max_char) {
              content.push("\n");
              for (var i = 0; i < this.indent_level; i++) {
                content.push(this.indent_string);
              }
              this.line_char_count = 0;
            } else {
              content.push(" ");
              this.line_char_count++;
            }
            space = false;
          }
          content.push(char);
        }
        return content.length ? content.join("") : "";
      };

      this.get_script = function() {
        var char = "";
        var content = [];
        var reg_match = new RegExp("</script" + ">", "igm");
        reg_match.lastIndex = this.pos;
        var reg_array = reg_match.exec(this.input);
        var end_script = reg_array ? reg_array.index : this.input.length;
        while (this.pos < end_script) {
          if (this.pos >= this.input.length) {
            return content.length ? content.join("") : ["", "TK_EOF"];
          }

          char = this.input.charAt(this.pos);
          this.pos++;

          content.push(char);
        }
        return content.length ? content.join("") : "";
      };

      this.record_tag = function(tag) {
        if (this.tags[tag + "count"]) {
          this.tags[tag + "count"]++;
          this.tags[tag + this.tags[tag + "count"]] = this.indent_level;
        } else {
          this.tags[tag + "count"] = 1;
          this.tags[tag + this.tags[tag + "count"]] = this.indent_level;
        }
        this.tags[tag + this.tags[tag + "count"] + "parent"] = this.tags.parent;
        this.tags.parent = tag + this.tags[tag + "count"];
      };

      this.retrieve_tag = function(tag) {
        if (this.tags[tag + "count"]) {
          var temp_parent = this.tags.parent;
          while (temp_parent) {
            if (tag + this.tags[tag + "count"] === temp_parent) {
              break;
            }
            temp_parent = this.tags[temp_parent + "parent"];
          }
          if (temp_parent) {
            this.indent_level = this.tags[tag + this.tags[tag + "count"]];
            this.tags.parent = this.tags[temp_parent + "parent"];
          }
          delete this.tags[tag + this.tags[tag + "count"] + "parent"];
          delete this.tags[tag + this.tags[tag + "count"]];
          if (this.tags[tag + "count"] == 1) {
            delete this.tags[tag + "count"];
          } else {
            this.tags[tag + "count"]--;
          }
        }
      };

      this.get_tag = function() {
        var char = "";
        var content = [];
        var space = false;

        do {
          if (this.pos >= this.input.length) {
            return content.length ? content.join("") : ["", "TK_EOF"];
          }

          char = this.input.charAt(this.pos);
          this.pos++;
          this.line_char_count++;

          if (this.Utils.in_array(char, this.Utils.whitespace)) {
            space = true;
            this.line_char_count--;
            continue;
          }

          if (char === "'" || char === '"') {
            if (!content[1] || content[1] !== "!") {
              char += this.get_unformatted(char);
              space = true;
            }
          }

          if (char === "=") {
            space = false;
          }

          if (
            content.length &&
            content[content.length - 1] !== "=" &&
            char !== ">" &&
            space
          ) {
            if (this.line_char_count >= this.max_char) {
              this.print_newline(false, content);
              this.line_char_count = 0;
            } else {
              content.push(" ");
              this.line_char_count++;
            }
            space = false;
          }
          content.push(char);
        } while (char !== ">");

        var tag_complete = content.join("");
        var tag_index;
        if (tag_complete.indexOf(" ") != -1) {
          tag_index = tag_complete.indexOf(" ");
        } else {
          tag_index = tag_complete.indexOf(">");
        }
        var tag_check = tag_complete.substring(1, tag_index).toLowerCase();
        if (
          tag_complete.charAt(tag_complete.length - 2) === "/" ||
          this.Utils.in_array(tag_check, this.Utils.single_token)
        ) {
          this.tag_type = "SINGLE";
        } else if (tag_check === "script") {
          this.record_tag(tag_check);
          this.tag_type = "SCRIPT";
        } else if (tag_check === "style") {
          this.record_tag(tag_check);
          this.tag_type = "STYLE";
        } else if (tag_check.charAt(0) === "!") {
          if (tag_check.indexOf("[if") != -1) {
            if (tag_complete.indexOf("!IE") != -1) {
              var comment = this.get_unformatted("-->", tag_complete);
              content.push(comment);
            }
            this.tag_type = "START";
          } else if (tag_check.indexOf("[endif") != -1) {
            this.tag_type = "END";
            this.unindent();
          } else if (tag_check.indexOf("[cdata[") != -1) {
            var comment = this.get_unformatted("]]>", tag_complete);
            content.push(comment);
            this.tag_type = "SINGLE";
          } else {
            var comment = this.get_unformatted("-->", tag_complete);
            content.push(comment);
            this.tag_type = "SINGLE";
          }
        } else {
          if (tag_check.charAt(0) === "/") {
            this.retrieve_tag(tag_check.substring(1));
            this.tag_type = "END";
          } else {
            this.record_tag(tag_check);
            this.tag_type = "START";
          }
          if (this.Utils.in_array(tag_check, this.Utils.extra_liners)) {
            this.print_newline(true, this.output);
          }
        }
        return content.join("");
      };

      this.get_unformatted = function(delimiter, orig_tag) {
        if (orig_tag && orig_tag.indexOf(delimiter) != -1) {
          return "";
        }
        var char = "";
        var content = "";
        var space = true;
        do {
          char = this.input.charAt(this.pos);
          this.pos++;

          if (this.Utils.in_array(char, this.Utils.whitespace)) {
            if (!space) {
              this.line_char_count--;
              continue;
            }
            if (char === "\n" || char === "\r") {
              content += "\n";
              for (var i = 0; i < this.indent_level; i++) {
                content += this.indent_string;
              }
              space = false;
              this.line_char_count = 0;
              continue;
            }
          }
          content += char;
          this.line_char_count++;
          space = true;
        } while (content.indexOf(delimiter) == -1);
        return content;
      };

      this.get_token = function() {
        var token;

        if (this.last_token === "TK_TAG_SCRIPT") {
          var temp_token = this.get_script();
          if (typeof temp_token !== "string") {
            return temp_token;
          }
          //token = js_beautify(temp_token, this.indent_size, this.indent_character, this.indent_level);
          //return [token, 'TK_CONTENT'];
          return [temp_token, "TK_CONTENT"];
        }
        if (this.current_mode === "CONTENT") {
          token = this.get_content();
          if (typeof token !== "string") {
            return token;
          } else {
            return [token, "TK_CONTENT"];
          }
        }

        if (this.current_mode === "TAG") {
          token = this.get_tag();
          if (typeof token !== "string") {
            return token;
          } else {
            var tag_name_type = "TK_TAG_" + this.tag_type;
            return [token, tag_name_type];
          }
        }
      };

      this.printer = function(
        js_source,
        indent_character,
        indent_size,
        max_char
      ) {
        this.input = js_source || "";
        this.output = [];
        this.indent_character = indent_character || " ";
        this.indent_string = "";
        this.indent_size = indent_size || 2;
        this.indent_level = 0;
        this.max_char = max_char || 70;
        this.line_char_count = 0;
        for (var i = 0; i < this.indent_size; i++) {
          this.indent_string += this.indent_character;
        }

        this.print_newline = function(ignore, arr) {
          this.line_char_count = 0;
          if (!arr || !arr.length) {
            return;
          }
          if (!ignore) {
            while (
              this.Utils.in_array(arr[arr.length - 1], this.Utils.whitespace)
            ) {
              arr.pop();
            }
          }
          arr.push("\n");
          for (var i = 0; i < this.indent_level; i++) {
            arr.push(this.indent_string);
          }
        };

        this.print_token = function(text) {
          this.output.push(text);
        };

        this.indent = function() {
          this.indent_level++;
        };

        this.unindent = function() {
          if (this.indent_level > 0) {
            this.indent_level--;
          }
        };
      };
      return this;
    }

    multi_parser = new Parser();
    multi_parser.printer(html_source, indent_character, indent_size);
    while (true) {
      var t = multi_parser.get_token();
      multi_parser.token_text = t[0];
      multi_parser.token_type = t[1];

      if (multi_parser.token_type === "TK_EOF") {
        break;
      }

      switch (multi_parser.token_type) {
        case "TK_TAG_START":
        case "TK_TAG_SCRIPT":
        case "TK_TAG_STYLE":
          multi_parser.print_newline(false, multi_parser.output);
          multi_parser.print_token(multi_parser.token_text);
          multi_parser.indent();
          multi_parser.current_mode = "CONTENT";
          break;
        case "TK_TAG_END":
          multi_parser.print_newline(true, multi_parser.output);
          multi_parser.print_token(multi_parser.token_text);
          multi_parser.current_mode = "CONTENT";
          break;
        case "TK_TAG_SINGLE":
          multi_parser.print_newline(false, multi_parser.output);
          multi_parser.print_token(multi_parser.token_text);
          multi_parser.current_mode = "CONTENT";
          break;
        case "TK_CONTENT":
          if (multi_parser.token_text !== "") {
            multi_parser.print_newline(false, multi_parser.output);
            multi_parser.print_token(multi_parser.token_text);
          }
          multi_parser.current_mode = "TAG";
          break;
      }
      multi_parser.last_token = multi_parser.token_type;
      multi_parser.last_text = multi_parser.token_text;
    }
    return multi_parser.output.join("");
  }

  return function(data) {
    var dataHolder = [
      "__dataHolder_",
      [Math.random(), Math.random(), Math.random(), Math.random()]
        .join("_")
        .replace(/[^0-9]/g, "_"),
      "_",
    ].join("_");
    var dataHolders = {};
    var index = 0;
    data = data.replace(/(\")(data:[^\"]*)(\")/g, function($0, $1, $2, $3) {
      var name = dataHolder + index++;
      dataHolders[name] = $2;
      return $1 + name + $3;
    });
    data = style_html(data, 1, "\t", 0x10000000);
    data = data.replace(new RegExp(dataHolder + "[0-9]+", "g"), function($0) {
      return dataHolders[$0];
    });

    return data;
  };
})();
